object WalkDialog: TWalkDialog Left = 196 Top = 131 HelpContext = 130 BorderStyle = bsDialog Caption = 'Speed Walking' ClientHeight = 353 ClientWidth = 564 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ShowHint = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnDeactivate = FormDeactivate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object WalkTab: TTabbedNotebook Left = 0 Top = 24 Width = 561 Height = 272 TabsPerRow = 6 TabFont.Color = clBtnText TabFont.Height = -11 TabFont.Name = 'MS Sans Serif' TabFont.Style = [] TabOrder = 0 OnChange = WalkTabChange object TTabPage Left = 4 Top = 24 Caption = 'Actions' object Image1: TImage Left = 184 Top = 8 Width = 32 Height = 32 AutoSize = True end object Label4: TLabel Left = 224 Top = 80 Width = 95 Height = 13 Caption = 'Current Path ahead:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object RecordLabel: TLabel Left = 352 Top = 120 Width = 75 Height = 13 Caption = 'RECORDING' Color = clBtnFace Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Visible = False end object Label5: TLabel Left = 224 Top = 120 Width = 97 Height = 13 Caption = 'Current Path behind:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object SlowLabel: TLabel Left = 349 Top = 80 Width = 78 Height = 13 Caption = 'Slow Walking' Color = clBtnFace Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Visible = False end object Label6: TLabel Left = 224 Top = 58 Width = 54 Height = 13 Caption = 'Path name:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 8 Top = 8 Width = 78 Height = 13 Caption = 'Stored Paths:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 8 Top = 24 Width = 148 Height = 13 Caption = 'Click on a path in this list to edit' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 8 Top = 38 Width = 116 Height = 13 Caption = 'Double-click to fast walk' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Bevel2: TBevel Left = 168 Top = 8 Width = 17 Height = 232 Shape = bsLeftLine end object Inh: TLabel Left = 224 Top = 168 Width = 188 Height = 13 Caption = 'Inherited from parent settings file' Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False end object Label19: TLabel Left = 224 Top = 16 Width = 219 Height = 13 Caption = 'Paths store directions to locations on the MUD' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object CurrentPath: TEdit Left = 224 Top = 96 Width = 209 Height = 21 Hint = '|Current directions stored in path or ahead of you in record buf' + 'fer' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnChange = CurrentPathChange end object FastBtn: TBitBtn Left = 440 Top = 54 Width = 105 Height = 27 Hint = '|Execute the current Path Ahead' Caption = '&Fast walk' Default = True Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 3 OnClick = FastBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333003333303333333333333333333333333633333603 3333333333333333333333363333633333333333333333333333333366363333 0003333333333333333333333EC6333333333333333333333333333C366C3333 3333333333333333333333E3C6C6333000333333333333333333333336663333 33333333333333333333333333E333000333333333333333333333333EE03333 3333333333333333333333333E00333333333333333333333333333330003333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object SlowBtn: TBitBtn Left = 440 Top = 86 Width = 105 Height = 27 Hint = '|Execute the current Path Ahead in Slow Walk mode' Caption = 'Slow &walk' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 6 ParentFont = False TabOrder = 5 OnClick = SlowBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333003330333333333333333333333333333633330333 33333333333333333333333363363333333333333333333333333333363E3333 333333333333333333333333366C333333333333333333333333333C36C63333 3333333333333333333333E3C6C6333333333333333333333333333336663333 33333333333333333333333333E333333333333333333333333333333EE03333 3333333333333333333333333E00333333333333333333333333333330003333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object StepBtn: TBitBtn Left = 440 Top = 150 Width = 105 Height = 27 Hint = '|Take a single step forward in the Path ahead' Caption = '&Step' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 7 ParentFont = False TabOrder = 6 OnClick = StepBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300333003333 33333F8333F83333333330033300333333333FF333FF33333333333333333333 333333333333333333330000300003333333F8883F8883333333000030000333 3333F3383F33833333330000300003333333F3383F3383333333300333003333 33333FF333FF3333333333333333333333333333333333333333333333330033 300333333333F8333F83333333330033300333333333FF333FF3333333333333 3333333333333333333333333330000300003333333F8883F888333333300003 00003333333F3383F33833333330000300003333333F3383F338333333330033 300333333333FF333FF333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object StartBtn: TBitBtn Left = 316 Top = 214 Width = 119 Height = 27 Hint = '|Mark current location and start recording a path' Caption = 'Start &Recording' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 4 ParentFont = False TabOrder = 11 OnClick = StartBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333338888833 3333333333333333333333388999998833333333333333333333338999999999 833333333333333333333B9999999999983333333333333333333B9999999999 98333333333333333333B9999999999999833333333333333333B99999999999 99833333333333333333B9999999999999833333333333333333B99999999999 99833333333333333333B99999999999998333333333333333333B9999999999 983333333333333333333B99999999999833333333333333333333B999999999 83333333333333333333333BB99999883333333333333333333333333BBBBB33 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 Spacing = -1 IsControl = True end object BitBtn1: TBitBtn Left = 440 Top = 182 Width = 105 Height = 27 Hint = '|Backup a single step in the Path behind' Caption = '&Backup' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 3 ParentFont = False TabOrder = 7 OnClick = BitBtn1Click Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300333003333 333338833388333333330000300003333333F3383F3383333333000030000333 3333F3383F33833333330000300003333333FFFF3FFFF3333333333333333333 3333333333333333333330033300333333333F8333F833333333300333003333 33333FF333FF3333333333333333333333333333333333333333333333330033 3003333333338833388333333330000300003333333F3383F338333333300003 00003333333F3383F33833333330000300003333333FFFF3FFFF333333333333 33333333333333333333333333330033300333333333F8333F83333333330033 300333333333FF333FF333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object StopBtn: TBitBtn Left = 316 Top = 214 Width = 119 Height = 27 Hint = '|Stop record a path and save it' Caption = 'Stop &Recording' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 4 ParentFont = False TabOrder = 10 Visible = False OnClick = StartBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333333333333333333333333333333333B888888888 8333333333333333333333B9999999998333333333333333333333B999999999 8333333333333333333333B9999999998333333333333333333333B999999999 8333333333333333333333B9999999998333333333333333333333B999999999 8333333333333333333333B9999999998333333333333333333333B999999999 8333333333333333333333B9999999998333333333333333333333BBBBBBBBBB 8333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 Spacing = -1 IsControl = True end object PBehind: TEdit Left = 224 Top = 136 Width = 209 Height = 21 Hint = '|Directions behind you in the record buffer' TabStop = False AutoSize = False Color = clBtnFace Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object BitBtn2: TBitBtn Left = 440 Top = 214 Width = 105 Height = 27 Hint = '|Turn around. Swaps Path ahead with Path behind' Caption = '&Turn around' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 9 OnClick = BitBtn2Click Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F88888FFF333333999999999 3333333888333888FF3333999333339993333388333333888FF3399933333339 993338833333333388F3399333333333993338833333333338FF993333333333 399388F333333333388F993333333333399388F3333333333383993333333333 333388F3333333333333993333333333333388F33333333FFFFF993333333399 999388FF33333388888F3993333333399993383FF3333338888F399933333333 99933883FF33333F888F339993333399999333883FFFFF88888F333999999999 3393333888333888338333333999993333333333388888333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object ReverseBtn: TBitBtn Left = 440 Top = 118 Width = 105 Height = 27 Hint = '|Reverse and Execute the current Path Ahead' Caption = 'Re&verse' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 8 OnClick = ReverseBtnClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333300333330333333333333333333333333363333 3603333333333333333333333336333363333333333333333333330003336636 33333333333333333333333333333EC6333333333333333333330003333C366C 33333333333333333333333333E3C6C633333333333333333333333333333666 333333333333333333333300033333E333333333333333333333333333333EE0 33333333333333333333333333333E0033333333333333333333333333333000 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object StopWalk: TBitBtn Left = 440 Top = 86 Width = 105 Height = 27 Hint = '|Stop the current slow walking' Caption = 'STOP walk' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ModalResult = 6 ParentFont = False TabOrder = 4 Visible = False OnClick = StopWalkClick Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333338888833 3333333333FFFFF33333333399999983333333333333333F3333333999999998 3333333333333333F33333999999999983333333333333333F33399999999999 983333333333333333F3B999999999999983383333333333333FB99999999999 9983383333333333333FB999999999999983383333333333333FB99999999999 9983383333333333333FB999999999999983383333333333333F3B9999999999 9933338333333333333333B99999999993333338333333333333333B99999999 333333338333333333333333B99999933333333338333333333333333BBBBB33 3333333333888883333333333333333333333333333333333333000000000000 0000000000000000000000000000000000000000} Margin = 8 NumGlyphs = 2 Spacing = -1 IsControl = True end object PathName: TEdit Left = 288 Top = 56 Width = 145 Height = 21 Hint = '|Name of path' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnChange = PathNameChange end object PathList: TListBox Left = 8 Top = 56 Width = 154 Height = 153 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 12 OnClick = PathListClick OnDblClick = PathListDblClick OnMouseDown = PathListMouseDown end object NewBtn: TBitBtn Left = 8 Top = 214 Width = 62 Height = 27 Hint = '|Create a new path' Caption = '&New' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 13 OnClick = NewBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object CopyBtn: TBitBtn Left = 72 Top = 214 Width = 62 Height = 27 Hint = '|Make a copy of the currently selected path' Caption = '&Copy' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 14 OnClick = CopyBtnClick Glyph.Data = { 56070000424D5607000000000000360400002800000028000000140000000100 0800000000002003000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF 0303030303030303030000000000000000000003030303030303030303F8F8F8 F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303 0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303 0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF 03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03 FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303 F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF 0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03 0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303 F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF 0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303 0303030300FF070707070707FF0003030303030303030303F8FF030303030303 03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303 F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303 0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303 030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8 0303030303030303030303030303030303030303030303030303030303030303 0303030303030303030303030303030303030303030303030303030303030303 0303030303030303030303030303030303030303030303030303} NumGlyphs = 2 Spacing = -1 IsControl = True end object DelBtn: TBitBtn Left = 136 Top = 214 Width = 27 Height = 27 Hint = 'Delete path' TabOrder = 15 OnClick = DelBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end end object TTabPage Left = 4 Top = 24 Caption = 'Settings' object Label7: TLabel Left = 40 Top = 16 Width = 212 Height = 13 Caption = 'This character is used to prefix speedwalking' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Sample: TLabel Left = 40 Top = 30 Width = 64 Height = 13 Caption = 'e.g. .3ns2wu' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label8: TLabel Left = 288 Top = 8 Width = 126 Height = 13 Caption = 'Slow Walking settings' end object Bevel1: TBevel Left = 416 Top = 15 Width = 121 Height = 9 Shape = bsTopLine end object Label74: TLabel Left = 288 Top = 50 Width = 144 Height = 13 Caption = 'Timeout value (1000 = 1 sec) :' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label73: TLabel Left = 288 Top = 78 Width = 195 Height = 13 Caption = 'Strings to determine successful slow walk' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object MoveChar: TEdit Left = 6 Top = 20 Width = 25 Height = 21 Hint = '|Character to enter to prefix speedwalking paths' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'Courier' Font.Style = [] MaxLength = 1 ParentFont = False TabOrder = 0 OnChange = MoveCharChange end object SlowTimeout: TCheckBox Left = 286 Top = 32 Width = 121 Height = 17 Hint = '|If checked, timeout stops walk, otherwise timeout continues slo' + 'w walk' Alignment = taLeftJustify Caption = 'Timeout aborts walk' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object SlowTime: TEdit Left = 440 Top = 48 Width = 57 Height = 21 Hint = '|Value of slow walk timer' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 end object SlowList: TStringGrid Left = 288 Top = 96 Width = 209 Height = 137 Hint = '|Strings used to continue slow walk' ColCount = 1 DefaultRowHeight = 17 FixedCols = 0 RowCount = 32 FixedRows = 0 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goEditing] ParentFont = False ScrollBars = ssVertical TabOrder = 3 ColWidths = ( 256) end end object TTabPage Left = 4 Top = 24 Caption = 'Directions' object Label9: TLabel Left = 8 Top = 8 Width = 103 Height = 13 Caption = 'Stored Directions:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 8 Top = 24 Width = 122 Height = 13 Caption = 'Click on a direction to edit' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Image2: TImage Left = 184 Top = 8 Width = 32 Height = 32 AutoSize = True end object Bevel3: TBevel Left = 168 Top = 8 Width = 9 Height = 230 Shape = bsLeftLine end object Label11: TLabel Left = 224 Top = 16 Width = 222 Height = 13 Caption = 'Directions assign MUD commands to the single' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label12: TLabel Left = 224 Top = 30 Width = 182 Height = 13 Caption = 'character codes used in speedwalking' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 224 Top = 54 Width = 214 Height = 13 Caption = 'Each direction needs a single character code' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label14: TLabel Left = 240 Top = 68 Width = 198 Height = 13 Caption = 'along with a code for the reverse direction' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label15: TLabel Left = 240 Top = 84 Width = 215 Height = 13 Caption = 'and a list of MUD commands used to activate' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label16: TLabel Left = 240 Top = 98 Width = 184 Height = 13 Caption = 'the direction seperated by a | character' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object AliasText: TLabel Left = 193 Top = 130 Width = 72 Height = 13 Caption = 'Direction code:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ComText: TLabel Left = 193 Top = 178 Width = 55 Height = 13 Caption = 'Commands:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label17: TLabel Left = 193 Top = 154 Width = 70 Height = 13 Caption = 'Reverse code:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object InhDir: TLabel Left = 272 Top = 224 Width = 188 Height = 13 Caption = 'Inherited from parent settings file' Font.Color = clRed Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False end object Label18: TLabel Left = 193 Top = 202 Width = 67 Height = 13 Caption = 'Map direction:' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object DirList: TListBox Left = 8 Top = 40 Width = 154 Height = 169 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 0 OnClick = DirListClick OnMouseDown = DirListMouseDown end object NewDirBtn: TBitBtn Left = 8 Top = 214 Width = 62 Height = 27 Hint = '|Create a new direction code' Caption = '&New' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = NewDirBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object DirChar: TEdit Left = 272 Top = 128 Width = 25 Height = 21 Hint = '|Single character code to assign command to' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 1 ParentFont = False TabOrder = 1 OnChange = DirCharChange end object DirStr: TEdit Left = 272 Top = 176 Width = 169 Height = 21 Hint = '|Commands separated by bar(|) to assign to direction code' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnChange = RevCharChange end object RevChar: TEdit Left = 272 Top = 152 Width = 25 Height = 21 Hint = '|Direction code to use when reversing a direction' AutoSize = False Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 1 ParentFont = False TabOrder = 2 OnChange = RevCharChange end object CopyDirBtn: TBitBtn Left = 72 Top = 214 Width = 62 Height = 27 Hint = '|Make a copy of the currently selected direction code' Caption = '&Copy' Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = CopyDirBtnClick Glyph.Data = { 56070000424D5607000000000000360400002800000028000000140000000100 0800000000002003000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF 0303030303030303030000000000000000000003030303030303030303F8F8F8 F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303 0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303 0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF 03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03 FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303 F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF 0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03 0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303 F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF 0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303 0303030300FF070707070707FF0003030303030303030303F8FF030303030303 03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303 F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303 0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303 030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8 0303030303030303030303030303030303030303030303030303030303030303 0303030303030303030303030303030303030303030303030303030303030303 0303030303030303030303030303030303030303030303030303} NumGlyphs = 2 Spacing = -1 IsControl = True end object DelDirBtn: TBitBtn Left = 136 Top = 214 Width = 27 Height = 27 Hint = 'Delete direction code' TabOrder = 6 OnClick = DelDirBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object MapDir: TComboBox Left = 272 Top = 200 Width = 169 Height = 21 Hint = '|Physical direction to move in the automapper (None for no direc' + 'tion)' DropDownCount = 11 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'North' 'Northeast' 'East' 'Southeast' 'South' 'Southwest' 'West' 'Northwest' 'Up' 'Down' 'None') ParentFont = False TabOrder = 7 end end end object Panel1: TPanel Left = 0 Top = 0 Width = 564 Height = 22 Align = alTop BevelOuter = bvLowered Caption = 'Panel1' TabOrder = 1 object Panel2: TPanel Left = 1 Top = 1 Width = 42 Height = 20 Align = alLeft BevelOuter = bvNone TabOrder = 0 object TopBtn: TSpeedButton Left = 0 Top = 0 Width = 20 Height = 20 Hint = 'Keep on top|Forces this dialog to display on top of others' AllowAllUp = True GroupIndex = 1 NumGlyphs = 2 OnClick = TopBtnClick end object LoadBtn: TSpeedButton Left = 20 Top = 0 Width = 20 Height = 20 Hint = 'Update for active MUD|Loads paths for current character window' NumGlyphs = 2 OnClick = LoadBtnClick end end object Panel3: TPanel Left = 43 Top = 1 Width = 520 Height = 20 Align = alClient BevelOuter = bvNone TabOrder = 1 object BtnPanel5: TBtnPanel Left = 0 Top = 0 Width = 64 Height = 20 BorderColor = clHighlight Align = alLeft BorderWidth = 1 Caption = 'Aliases' Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = AliasBtnClick end object VarBtn: TBtnPanel Left = 64 Top = 0 Width = 64 Height = 20 BorderColor = clHighlight Align = alLeft BorderWidth = 1 Caption = 'Variables' Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = VarBtnClick end object MacroBtn: TBtnPanel Left = 128 Top = 0 Width = 64 Height = 20 BorderColor = clHighlight Align = alLeft BorderWidth = 1 Caption = 'Macros' Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = MacroBtnClick end object ButBtn: TBtnPanel Left = 192 Top = 0 Width = 64 Height = 20 BorderColor = clHighlight Align = alLeft BorderWidth = 1 Caption = 'Buttons' Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = ButBtnClick end object TrigBtn: TBtnPanel Left = 256 Top = 0 Width = 64 Height = 20 BorderColor = clHighlight Align = alLeft BorderWidth = 1 Caption = 'Triggers' Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = TrigBtnClick end object WalkBtn: TBtnPanel Left = 320 Top = 0 Width = 88 Height = 20 BorderColor = clHighlight Align = alLeft BorderWidth = 1 Caption = 'Speedwalking' Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = WalkBtnClick end end end object OKBtn: TBitBtn Left = 320 Top = 300 Width = 77 Height = 27 Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = OKBtnClick Kind = bkOK Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 402 Top = 300 Width = 77 Height = 27 Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = CancelBtnClick Kind = bkCancel Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 484 Top = 300 Width = 77 Height = 27 HelpContext = 130 Font.Color = clBtnText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = ReverseBtnClick Kind = bkHelp Spacing = -1 IsControl = True end object HelpPanel: TPanel Left = 0 Top = 333 Width = 564 Height = 20 Align = alBottom Alignment = taLeftJustify BevelOuter = bvLowered Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 end object PopupMenu1: TPopupMenu Left = 8 Top = 304 object FastWalk1: TMenuItem Caption = 'Fast Walk' ShortCut = 0 OnClick = PathListDblClick end object Reverse1: TMenuItem Caption = 'Reverse' ShortCut = 0 OnClick = ReverseBtnClick end object SlowWalk1: TMenuItem Caption = 'Slow Walk' ShortCut = 0 OnClick = SlowBtnClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object New1: TMenuItem Caption = 'New' ShortCut = 0 OnClick = NewBtnClick end object Copy1: TMenuItem Caption = 'Copy' ShortCut = 0 OnClick = CopyBtnClick end object Delete1: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = DelBtnClick end end object PopupMenu2: TPopupMenu Left = 40 Top = 304 object MenuItem3: TMenuItem Caption = 'New' ShortCut = 0 OnClick = NewDirBtnClick end object MenuItem4: TMenuItem Caption = 'Copy' ShortCut = 0 OnClick = CopyDirBtnClick end object MenuItem5: TMenuItem Caption = 'Delete' ShortCut = 0 OnClick = DelDirBtnClick end end end